home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 2 / Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso / SetAttributesDir / Pearls / dev / M2Amiga / Demos / SetAttributes
Text File  |  1995-02-27  |  977b  |  40 lines
  1. .k ScriptDir/A
  2. Failat 21
  3. Protect "Eyes" "RWED"
  4. FileNote "Eyes" ""
  5. Protect "Eyes.info" "RWD"
  6. FileNote "Eyes.info" ""
  7. Protect "Features" "RWED"
  8. FileNote "Features" ""
  9. Protect "Features.info" "RWD"
  10. FileNote "Features.info" ""
  11. Protect "HelloWorld" "RWED"
  12. FileNote "HelloWorld" ""
  13. Protect "HelloWorld.info" "RWD"
  14. FileNote "HelloWorld.info" ""
  15. Protect "obj.info" "RWD"
  16. FileNote "obj.info" ""
  17. Protect "obj" "RWED"
  18. FileNote "obj" ""
  19. CD "obj"
  20. Assign ScriptDir<$$>.5: "<ScriptDir>"
  21. Execute "ScriptDir<$$>.5:obj/SetAttributes" "ScriptDir<$$>.5:obj"
  22. CD /
  23. Protect "sym.info" "RWD"
  24. FileNote "sym.info" ""
  25. Protect "sym" "RWED"
  26. FileNote "sym" ""
  27. CD "sym"
  28. Assign ScriptDir<$$>.5: "<ScriptDir>"
  29. Execute "ScriptDir<$$>.5:sym/SetAttributes" "ScriptDir<$$>.5:sym"
  30. CD /
  31. Protect "txt.info" "RWD"
  32. FileNote "txt.info" ""
  33. Protect "txt" "RWED"
  34. FileNote "txt" ""
  35. CD "txt"
  36. Assign ScriptDir<$$>.5: "<ScriptDir>"
  37. Execute "ScriptDir<$$>.5:txt/SetAttributes" "ScriptDir<$$>.5:txt"
  38. CD /
  39. Assign ScriptDir<$$>.5:
  40.